From: Paul Eggert <eggert@cs.ucla.edu>
Date: Sun, 27 Mar 2011 08:31:16 +0000 (-0700)
Subject: * eval.c (Fbacktrace_frame): Don't assume nframes fits in int.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~4269^2~12
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=764a02ade0c959474aa97a8389dfb42d3153b0fe;p=emacs.git

* eval.c (Fbacktrace_frame): Don't assume nframes fits in int.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 13f45b4ec37..8db3dc0c442 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,6 +1,7 @@
 2011-03-27  Paul Eggert  <eggert@cs.ucla.edu>
 
 	* eval.c (Fbacktrace): Don't assume nargs fits in int.
+	(Fbacktrace_frame): Don't assume nframes fits in int.
 
 	* syntax.c (scan_sexps_forward): Avoid pointer wraparound.
 
diff --git a/src/eval.c b/src/eval.c
index b732cbc644a..982fec66bbf 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -3365,7 +3365,7 @@ If NFRAMES is more than the number of frames, the value is nil.  */)
   (Lisp_Object nframes)
 {
   register struct backtrace *backlist = backtrace_list;
-  register int i;
+  register EMACS_INT i;
   Lisp_Object tem;
 
   CHECK_NATNUM (nframes);